home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
SPACE 1
/
SPACE - Library 1 - Volume 1.iso
/
program
/
441
/
dlibs12
/
atol.c
< prev
next >
Wrap
C/C++ Source or Header
|
1990-11-23
|
425b
|
28 lines
#include <stdio.h>
#include <ctype.h>
long atol(number)
register char *number;
{
register long n = 0, neg = 0;
while(isspace(*number))
++number;
if(*number == '-')
{
neg = 1;
++number;
}
else if(*number == '+')
++number;
while(isdigit(*number))
n = (n * 10) + ((*number++) - '0');
return(neg ? -n : n);
}
int atoi(number)
char *number;
{
return((int) atol(number));
}